Aminet 15/Aminet 15 - Nov 1996.iso/Aminet/dev/lang/perl_bin.lha/bin/pod2text

Text File | 1996-09-10 | 139 b | 13 lines

#!/ade/bin/perl
    eval 'exec perl -S $0 "$@"'
    if 0;

use Pod::Text;

if(@ARGV) {
    pod2text($ARGV[0]);
} else {
    pod2text("<&STDIN");
}